home *** CD-ROM | disk | FTP | other *** search
/ A Virtual Reality Guide to Texas / CD.iso / texdata / trnsprtr.dir / 00463_pda-out initialize script.ls < prev    next >
Encoding:
Text File  |  1998-06-17  |  1.9 KB  |  62 lines
  1. on enterFrame
  2.   global gRegionName
  3.   set the visible of sprite 3 to 0
  4.   if gRegionName = "ST" then
  5.     set the visible of sprite 48 to 0
  6.   end if
  7. end
  8.  
  9. on exitFrame
  10.   global gPDAActivated, gRegionName, gQTVRNode, gStartVR, gPDAPict
  11.   if gRegionName = "BB" then
  12.     set the castNum of sprite 3 to 4991
  13.   else
  14.     if gRegionName = "PW" then
  15.       set the castNum of sprite 3 to 4992
  16.       set the loc of sprite 3 to point(the stageLeft + 27, the stageTop + 226)
  17.     else
  18.       if gRegionName = "PL" then
  19.         set the castNum of sprite 3 to 4993
  20.         set the loc of sprite 3 to point(the stageLeft + 27, the stageTop + 226)
  21.       else
  22.         if gRegionName = "ST" then
  23.         end if
  24.       end if
  25.     end if
  26.   end if
  27.   if gRegionName = "ST" then
  28.     set the visible of sprite 3 to 0
  29.   else
  30.     if gRegionName = ("PW" or "PL" or "BB") then
  31.       set the visible of sprite 3 to 1
  32.     end if
  33.   end if
  34.   updateStage()
  35.   put line 1 to 2 of field "Region Help Rollover Text" into field "Region Help Text"
  36.   set the text of field "PDA location list" to "This text is updated by selecting a   category from the pull down menu above."
  37.   if the castNum of sprite 48 <> 0 then
  38.     if the type of member the castNum of sprite 48 = #digitalVideo then
  39.       set the movieRate of sprite 48 to 0
  40.       set the movieTime of sprite 48 to 0
  41.       updateStage()
  42.       set the video of member the castNum of sprite 48 to 0
  43.       set the visible of sprite 48 to 0
  44.       set the loc of sprite 48 to point(-1290, -1240)
  45.       updateStage()
  46.       updateStage()
  47.     end if
  48.   end if
  49.   set gPDAPict to 0
  50.   set gPDAActivated to 1
  51.   set gQTVRNode to 1
  52.   puppetSprite(5, 1)
  53.   set the castNum of sprite 5 to the number of member (gRegionName & ".Regional InfoText")
  54.   set the loc of sprite 5 to point(37, 208)
  55.   set the scrollTop of member (gRegionName & ".Regional InfoText") to 0
  56.   puppetSprite(9, 0)
  57.   puppetTransition(7, 2, 10)
  58.   puppetSound(3, "menuon4")
  59.   updateStage()
  60.   unLoad()
  61. end
  62.